
function   result = checkdescendants1(j,X,threshold,result)
% initial set result=0
% if the result=1, means that a coefficient has at least 
% 1 significant descendant.
global N
[m,n]=size(N);

for i=(4*j-3):4*j;
      if result==1 | i > m
         break;
      end;
         
     if abs(X(N(i,1),N(i,2)))>=threshold     
        result=1;
        break; 
     else 
       
     result=checkdescendants1(i,X,threshold,result);
    
     end;
   
end;
   

